perm filename EBAR[UCI,SYS] blob sn#047722 filedate 1973-07-03 generic text, type T, neo UTF8
00100	
00200	(INITFN
00300	 (QUOTE
00400	  (LAMBDA()
00500	   (SYSCLR)
00600	   (INITFN
00700	    (QUOTE
00800	     (LAMBDA()
00900	      (TERPRI)
01000	      (PRINC (QUOTE "UCI LISP"))
01100	      (INITFN NIL)
01200	      (TERPRI)))))))
01300	(PROG NIL (INC NIL T) (OUTC NIL T) (EXCISE) (ERR))